home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 011 / batch.arc / BEEP.ASM next >
Encoding:
Assembly Source File  |  1986-01-04  |  1.1 KB  |  57 lines
  1. ;
  2.         page    60,132
  3.         title    Ring the Console Bell
  4. ;
  5. ;    Author:    Marty Prahl
  6. ;    Date:    12-dec-84
  7. ;    Rev:    1.0
  8. ;
  9. ;    Copyright (c) 1984 by Marty Prahl
  10. ;
  11. ;    Abstract:
  12. ;
  13. ;
  14. ;---------------------------------------------------------------------------
  15. ;
  16. ;    Symbols
  17. ;
  18. ;---------------------------------------------------------------------------
  19. ;
  20. cseg        segment para    public 'CODE'
  21.         assume    cs:cseg, ds:cseg
  22.  
  23.         org    0100h
  24.  
  25.         include system.mac
  26.  
  27.         dos_functions
  28.  
  29.         page
  30. ;
  31. ;---------------------------------------------------------------------------
  32. ;
  33. ;    Local Data
  34. ;
  35. ;---------------------------------------------------------------------------
  36. ;
  37. bell    equ    7
  38.  
  39. ;
  40. ;---------------------------------------------------------------------------
  41. ;
  42. ;    Beep  
  43. ;
  44. ;---------------------------------------------------------------------------
  45. ;
  46. beep:
  47.         mov    dl,bell        ; ring the bell
  48.         mov    ah,con_out    ; display console output
  49.         int    dos        ; dos interrupt
  50.  
  51.         mov    al,0        ; no error on return
  52.         mov    ah,exit_proc    ; dos terminate
  53.         int    dos        ; dos interrupt
  54.  
  55. cseg        ends
  56.         end    beep
  57.